home *** CD-ROM | disk | FTP | other *** search
/ Carousel Volume 2 #1 / carousel.iso / mactosh / hc / recipe.sit / Recipe Box / background_8796.txt < prev    next >
Encoding:
Text File  |  1988-08-19  |  10.8 KB  |  500 lines
  1. -- background: 8796 from stack: in
  2. -- bmap block id: 12243
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: 
  6.  
  7.  
  8. -- part 2 (button)
  9. -- low flags: 00
  10. -- high flags: 0000
  11. -- rect: left=270 top=287 right=312 bottom=297
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 1013 / 1013
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Next
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   visual effect wipe down
  23.   go to next card
  24. end mouseUp
  25.  
  26.  
  27.  
  28. -- part 3 (button)
  29. -- low flags: 00
  30. -- high flags: 0000
  31. -- rect: left=110 top=289 right=335 bottom=158
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 1007 / 1007
  34. -- text alignment: 1
  35. -- font id: 0
  36. -- text size: 12
  37. -- style flags: 0
  38. -- line height: 16
  39. -- part name: ImageWriter
  40. ----- HyperTalk script -----
  41. on mouseUp
  42.   doMenu "Print Card"
  43. end mouseUp
  44.  
  45.  
  46.  
  47. -- part 5 (button)
  48. -- low flags: 00
  49. -- high flags: 0000
  50. -- rect: left=64 top=291 right=330 bottom=106
  51. -- title width / last selected line: 0
  52. -- icon id / first selected line: 32670 / 32670
  53. -- text alignment: 1
  54. -- font id: 0
  55. -- text size: 12
  56. -- style flags: 0
  57. -- line height: 16
  58. -- part name: 
  59. ----- HyperTalk script -----
  60. on mouseUp
  61.   show all cards
  62. end mouseUp
  63.  
  64.  
  65.  
  66. -- part 6 (button)
  67. -- low flags: 00
  68. -- high flags: 0000
  69. -- rect: left=10 top=293 right=331 bottom=51
  70. -- title width / last selected line: 0
  71. -- icon id / first selected line: 20098 / 20098
  72. -- text alignment: 1
  73. -- font id: 0
  74. -- text size: 12
  75. -- style flags: 0
  76. -- line height: 16
  77. -- part name: Home
  78. ----- HyperTalk script -----
  79. on mouseUp
  80.   visual effect iris close
  81.   go home
  82. end mouseUp
  83.  
  84.  
  85.  
  86. -- part 7 (button)
  87. -- low flags: 00
  88. -- high flags: 8003
  89. -- rect: left=313 top=288 right=310 bottom=406
  90. -- title width / last selected line: 0
  91. -- icon id / first selected line: 0 / 0
  92. -- text alignment: 1
  93. -- font id: 0
  94. -- text size: 12
  95. -- style flags: 0
  96. -- line height: 16
  97. -- part name: Index
  98. ----- HyperTalk script -----
  99. on mouseUp
  100.   go to first card
  101. end mouseUp
  102.  
  103.  
  104.  
  105. -- part 8 (button)
  106. -- low flags: 00
  107. -- high flags: A003
  108. -- rect: left=314 top=312 right=334 bottom=409
  109. -- title width / last selected line: 0
  110. -- icon id / first selected line: 0 / 0
  111. -- text alignment: 1
  112. -- font id: 0
  113. -- text size: 12
  114. -- style flags: 0
  115. -- line height: 16
  116. -- part name: Find
  117. ----- HyperTalk script -----
  118. on mouseUp
  119.   doMenu "Find..."
  120. end mouseUp
  121.  
  122.  
  123.  
  124. -- part 9 (button)
  125. -- low flags: 00
  126. -- high flags: 0000
  127. -- rect: left=422 top=284 right=312 bottom=459
  128. -- title width / last selected line: 0
  129. -- icon id / first selected line: 1012 / 1012
  130. -- text alignment: 1
  131. -- font id: 0
  132. -- text size: 12
  133. -- style flags: 0
  134. -- line height: 16
  135. -- part name: Return
  136. ----- HyperTalk script -----
  137. on mouseUp
  138.   visual effect iris close
  139.   pop card
  140. end mouseUp
  141.  
  142.  
  143.  
  144. -- part 10 (button)
  145. -- low flags: 00
  146. -- high flags: 0000
  147. -- rect: left=470 top=286 right=313 bottom=501
  148. -- title width / last selected line: 0
  149. -- icon id / first selected line: 26635 / 26635
  150. -- text alignment: 1
  151. -- font id: 0
  152. -- text size: 12
  153. -- style flags: 0
  154. -- line height: 16
  155. -- part name: Help
  156. ----- HyperTalk script -----
  157. on mouseUp
  158.   go to card "Recipe Help"
  159. end mouseUp
  160.  
  161.  
  162. -- part 11 (field)
  163. -- low flags: 00
  164. -- high flags: 4000
  165. -- rect: left=85 top=23 right=40 bottom=479
  166. -- title width / last selected line: 0
  167. -- icon id / first selected line: 0 / 0
  168. -- text alignment: 0
  169. -- font id: 3
  170. -- text size: 12
  171. -- style flags: 0
  172. -- line height: 16
  173. -- part name: 
  174.  
  175.  
  176. -- part 12 (button)
  177. -- low flags: 00
  178. -- high flags: 0000
  179. -- rect: left=225 top=287 right=312 bottom=252
  180. -- title width / last selected line: 0
  181. -- icon id / first selected line: 1014 / 1014
  182. -- text alignment: 1
  183. -- font id: 0
  184. -- text size: 12
  185. -- style flags: 0
  186. -- line height: 16
  187. -- part name: Prev
  188. ----- HyperTalk script -----
  189. on mouseUp
  190.   visual effect wipe up
  191.   go to previous card
  192. end mouseUp
  193.  
  194.  
  195.  
  196. -- part 17 (button)
  197. -- low flags: 00
  198. -- high flags: 0002
  199. -- rect: left=31 top=56 right=160 bottom=139
  200. -- title width / last selected line: 0
  201. -- icon id / first selected line: 0 / 0
  202. -- text alignment: 1
  203. -- font id: 0
  204. -- text size: 12
  205. -- style flags: 0
  206. -- line height: 16
  207. -- part name: Art 1
  208. ----- HyperTalk script -----
  209. on mouseUp
  210.   get the rect of target
  211.   put item 1 of it into upperleft
  212.   put item 2 of it into item 2 of upperleft
  213.   put item 3 of it into item 1 of lowright
  214.   put item 4 of it into item 2 of lowright
  215.   set lockScreen to True
  216.   put "Selecting picture.. " into message
  217.   choose select tool
  218.   drag from upperleft to lowright
  219.   doMenu "Select"
  220.   doMenu "Copy Picture"
  221.   choose browse tool
  222.   set lockScreen to False
  223.   play "Boing"
  224.   pop card
  225.   doMenu "Paste Picture"
  226.   put "Drag the picture, type command-tab and close this box"
  227. end mouseUp
  228.  
  229.  
  230.  
  231. -- part 19 (button)
  232. -- low flags: 00
  233. -- high flags: 0002
  234. -- rect: left=30 top=170 right=274 bottom=138
  235. -- title width / last selected line: 0
  236. -- icon id / first selected line: 0 / 0
  237. -- text alignment: 1
  238. -- font id: 0
  239. -- text size: 12
  240. -- style flags: 0
  241. -- line height: 16
  242. -- part name: Art 1
  243. ----- HyperTalk script -----
  244. on mouseUp
  245.   get the rect of target
  246.   put item 1 of it into upperleft
  247.   put item 2 of it into item 2 of upperleft
  248.   put item 3 of it into item 1 of lowright
  249.   put item 4 of it into item 2 of lowright
  250.   set lockScreen to True
  251.   put "Selecting picture..." into message
  252.   choose select tool
  253.   drag from upperleft to lowright
  254.   doMenu "Select"
  255.   doMenu "Copy Picture"
  256.   choose browse tool
  257.   set lockScreen to False
  258.   play "Boing"
  259.   pop card
  260.   doMenu "Paste Picture"
  261.   put "Drag the picture, type command-tab and close this box"
  262.  
  263. end mouseUp
  264.  
  265.  
  266.  
  267. -- part 20 (button)
  268. -- low flags: 00
  269. -- high flags: 0002
  270. -- rect: left=149 top=56 right=160 bottom=257
  271. -- title width / last selected line: 0
  272. -- icon id / first selected line: 0 / 0
  273. -- text alignment: 1
  274. -- font id: 0
  275. -- text size: 12
  276. -- style flags: 0
  277. -- line height: 16
  278. -- part name: Art 1
  279. ----- HyperTalk script -----
  280. on mouseUp
  281.   get the rect of target
  282.   put item 1 of it into upperleft
  283.   put item 2 of it into item 2 of upperleft
  284.   put item 3 of it into item 1 of lowright
  285.   put item 4 of it into item 2 of lowright
  286.   set lockScreen to True
  287.   put "Selecting picture..." into message
  288.   choose select tool
  289.   drag from upperleft to lowright
  290.   doMenu "Select"
  291.   doMenu "Copy Picture"
  292.   choose browse tool
  293.   set lockScreen to False
  294.   play "Boing"
  295.   pop card
  296.   doMenu "Paste Picture"
  297.   put "Drag the picture, type command-tab and close this box"
  298. end mouseUp
  299.  
  300.  
  301.  
  302. -- part 21 (button)
  303. -- low flags: 00
  304. -- high flags: 0002
  305. -- rect: left=266 top=56 right=160 bottom=374
  306. -- title width / last selected line: 0
  307. -- icon id / first selected line: 0 / 0
  308. -- text alignment: 1
  309. -- font id: 0
  310. -- text size: 12
  311. -- style flags: 0
  312. -- line height: 16
  313. -- part name: Art 1
  314. ----- HyperTalk script -----
  315. on mouseUp
  316.   get the rect of target
  317.   put item 1 of it into upperleft
  318.   put item 2 of it into item 2 of upperleft
  319.   put item 3 of it into item 1 of lowright
  320.   put item 4 of it into item 2 of lowright
  321.   set lockScreen to True
  322.   put "Selecting picture..." into message
  323.   choose select tool
  324.   drag from upperleft to lowright
  325.   doMenu "Select"
  326.   doMenu "Copy Picture"
  327.   choose browse tool
  328.   set lockScreen to False
  329.   play "Boing"
  330.   pop card
  331.   doMenu "Paste Picture"
  332.   put "Drag the picture, type command-tab and close this box"
  333.  
  334. end mouseUp
  335.  
  336.  
  337.  
  338. -- part 22 (button)
  339. -- low flags: 00
  340. -- high flags: 0002
  341. -- rect: left=383 top=56 right=160 bottom=491
  342. -- title width / last selected line: 0
  343. -- icon id / first selected line: 0 / 0
  344. -- text alignment: 1
  345. -- font id: 0
  346. -- text size: 12
  347. -- style flags: 0
  348. -- line height: 16
  349. -- part name: Art 1
  350. ----- HyperTalk script -----
  351. on mouseUp
  352.   get the rect of target
  353.   put item 1 of it into upperleft
  354.   put item 2 of it into item 2 of upperleft
  355.   put item 3 of it into item 1 of lowright
  356.   put item 4 of it into item 2 of lowright
  357.   set lockScreen to True
  358.   put "Selecting picture..." into message
  359.   choose select tool
  360.   drag from upperleft to lowright
  361.   doMenu "Select"
  362.   doMenu "Copy Picture"
  363.   choose browse tool
  364.   set lockScreen to False
  365.   play "Boing"
  366.   pop card
  367.   doMenu "Paste Picture"
  368.   put "Drag the picture, type command-tab and close this box"
  369.  
  370. end mouseUp
  371.  
  372.  
  373.  
  374. -- part 23 (button)
  375. -- low flags: 00
  376. -- high flags: 0002
  377. -- rect: left=149 top=170 right=274 bottom=257
  378. -- title width / last selected line: 0
  379. -- icon id / first selected line: 0 / 0
  380. -- text alignment: 1
  381. -- font id: 0
  382. -- text size: 12
  383. -- style flags: 0
  384. -- line height: 16
  385. -- part name: Art 1
  386. ----- HyperTalk script -----
  387. pop card
  388. on mouseUp
  389.   get the rect of target
  390.   put item 1 of it into upperleft
  391.   put item 2 of it into item 2 of upperleft
  392.   put item 3 of it into item 1 of lowright
  393.   put item 4 of it into item 2 of lowright
  394.   set lockScreen to True
  395.   put "Selecting picture..." into message
  396.   choose select tool
  397.   drag from upperleft to lowright
  398.   doMenu "Select"
  399.   doMenu "Copy Picture"
  400.   choose browse tool
  401.   set lockScreen to False
  402.   play "Boing"
  403.   pop card
  404.   doMenu "Paste Picture"
  405.   put "Drag the picture, type command-tab and close this box"
  406.  
  407. end mouseUp
  408.  
  409.  
  410.  
  411. -- part 24 (button)
  412. -- low flags: 00
  413. -- high flags: 0002
  414. -- rect: left=267 top=170 right=274 bottom=375
  415. -- title width / last selected line: 0
  416. -- icon id / first selected line: 0 / 0
  417. -- text alignment: 1
  418. -- font id: 0
  419. -- text size: 12
  420. -- style flags: 0
  421. -- line height: 16
  422. -- part name: Art 1
  423. ----- HyperTalk script -----
  424. on mouseUp
  425.   get the rect of target
  426.   put item 1 of it into upperleft
  427.   put item 2 of it into item 2 of upperleft
  428.   put item 3 of it into item 1 of lowright
  429.   put item 4 of it into item 2 of lowright
  430.   set lockScreen to True
  431.   put "Selecting picture..." into message
  432.   choose select tool
  433.   drag from upperleft to lowright
  434.   doMenu "Select"
  435.   doMenu "Copy Picture"
  436.   choose browse tool
  437.   set lockScreen to False
  438.   play "Boing"
  439.   pop card
  440.   doMenu "Paste Picture"
  441.   put "Drag the picture, type command-tab and close this box"
  442.  
  443. end mouseUp
  444.  
  445.  
  446.  
  447. -- part 25 (button)
  448. -- low flags: 00
  449. -- high flags: 0002
  450. -- rect: left=385 top=170 right=274 bottom=493
  451. -- title width / last selected line: 0
  452. -- icon id / first selected line: 0 / 0
  453. -- text alignment: 1
  454. -- font id: 0
  455. -- text size: 12
  456. -- style flags: 0
  457. -- line height: 16
  458. -- part name: Art 1
  459. ----- HyperTalk script -----
  460. on mouseUp
  461.   get the rect of target
  462.   put item 1 of it into upperleft
  463.   put item 2 of it into item 2 of upperleft
  464.   put item 3 of it into item 1 of lowright
  465.   put item 4 of it into item 2 of lowright
  466.   set lockScreen to True
  467.   put "Selecting picture..." into message
  468.   choose select tool
  469.   drag from upperleft to lowright
  470.   doMenu "Select"
  471.   doMenu "Copy Picture"
  472.   choose browse tool
  473.   set lockScreen to False
  474.   play "Boing"
  475.   pop card
  476.   doMenu "Paste Picture"
  477.   put "Drag the picture, type command-tab and close this box"
  478.  
  479. end mouseUp
  480.  
  481.  
  482.  
  483. -- part 26 (button)
  484. -- low flags: 00
  485. -- high flags: 8003
  486. -- rect: left=164 top=291 right=333 bottom=209
  487. -- title width / last selected line: 0
  488. -- icon id / first selected line: 0 / 0
  489. -- text alignment: 1
  490. -- font id: 0
  491. -- text size: 12
  492. -- style flags: 0
  493. -- line height: 16
  494. -- part name: New
  495. ----- HyperTalk script -----
  496. on mouseUp
  497.   doMenu "New Card"
  498. end Mouseup
  499.  
  500.